inherited FrmMedias: TFrmMedias Left = 532 Top = 396 Caption = 'FrmMedias' PixelsPerInch = 96 TextHeight = 13 object cxGrid: TcxGrid [1] Left = 0 Top = 41 Width = 329 Height = 163 Align = alClient TabOrder = 1 object cxGridDBTableView: TcxGridDBTableView OnDblClick = cxGridDBTableViewDblClick NavigatorButtons.ConfirmDelete = False DataController.DataSource = dsFiche DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnGrouping = False OptionsCustomize.ColumnHiding = True OptionsCustomize.ColumnMoving = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsSelection.CellSelect = False OptionsView.ColumnAutoWidth = True OptionsView.GroupByBox = False Styles.StyleSheet = dtmSession.cxGridTableViewStyleSheet object cxGridDBTableViewIdx: TcxGridDBColumn Visible = False end object cxGridDBTableViewcalc_name: TcxGridDBColumn Caption = 'Fichier' DataBinding.FieldName = 'calc_name' OnCustomDrawCell = cxGridDBTableViewcalc_nameCustomDrawCell Width = 303 end object cxGridDBTableViewcalc_found: TcxGridDBColumn DataBinding.FieldName = 'calc_found' Visible = False end object cxGridDBTableViewFileName: TcxGridDBColumn DataBinding.FieldName = 'FileName' Visible = False end end object cxGridLevel: TcxGridLevel GridView = cxGridDBTableView end end object Panel1: TPanel [2] Left = 0 Top = 0 Width = 329 Height = 41 Align = alTop Caption = 'Panel1' TabOrder = 2 Visible = False object ImageLoups: TImage Left = 8 Top = 9 Width = 6 Height = 6 AutoSize = True Picture.Data = {} Transparent = True end end object TBXDock1: TTBXDock [3] Left = 0 Top = 204 Width = 329 Height = 26 Position = dpBottom object TBToolbar1: TTBXToolbar Left = 0 Top = 0 Align = alBottom BorderStyle = bsNone Caption = 'TBToolbar' DockMode = dmCannotFloatOrChangeDocks DockPos = 152 DragHandleStyle = dhNone FullSize = True Images = ImageListSmall TabOrder = 0 object TBItem1: TTBXItem Action = ActionFermer DisplayMode = nbdmImageAndText end object TBSeparatorItem1: TTBXSeparatorItem end object TBItem2: TTBXItem Action = ActionLancer DisplayMode = nbdmImageAndText end object TBItem3: TTBXItem Action = ActionVoir DisplayMode = nbdmImageAndText end object TBItem4: TTBXItem Action = ActionExplorateur DisplayMode = nbdmImageAndText end end end inherited aclFiche: TActionList object ActionFermer: TAction Caption = 'Fermer' ImageIndex = 16 OnExecute = ActionFermerExecute end object ActionLancer: TAction Caption = 'Lancer' ImageIndex = 22 OnExecute = ActionLancerExecute OnUpdate = ActionLancerUpdate end object ActionVoir: TAction Caption = 'Afficher' ImageIndex = 23 OnExecute = ActionVoirExecute OnUpdate = ActionVoirUpdate end object ActionExplorateur: TAction Caption = 'Explorateur' ImageIndex = 25 OnExecute = ActionExplorateurExecute OnUpdate = ActionExplorateurUpdate end end object qryFiche: TIBQuery [5] Database = dtmSession.IBDatabase OnCalcFields = qryFicheCalcFields BufferChunks = 1000 CachedUpdates = False Left = 40 Top = 120 end object dsFiche: TDataSource [6] DataSet = qryFiche Left = 32 Top = 80 end end